home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / nivb / nwdiag.bas < prev    next >
BASIC Source File  |  1995-05-09  |  16KB  |  418 lines
  1. 'NWDIAG.BAS  NetWare Diagnostics Services Interface for Visual Basic For Windows
  2. 'Version 1.0
  3. 'Novell Systems Research Department, Novell, Inc.
  4. 'Copyright (c) 1993, Novell, Inc.
  5. 'This interface is not supported through Novell's regular
  6. 'support channels.  See README.TXT for more information.
  7.  
  8. Global Const MAX_NETWORKS = 120
  9. Global Const MAX_SERVERS = 150
  10. Global Const MAX_NODES = 120
  11. Global Const MAX_EXCLUSIONS = 80
  12.  
  13. Global Const MAX_COMPONENTS = 10
  14. Global Const MAX_LOCAL_NETWORKS = 4
  15. Global Const MAX_ROUTES = 47
  16.  
  17. Global Const MAX_IPX_PACKET_SIZE = 576
  18.  
  19. Global Const IPX_SPX_COMPONENT = 0
  20. Global Const BRIDGE_DRIVER_COMPONENT = 1
  21. Global Const SHELL_DRIVER_COMPONENT = 2
  22. Global Const SHELL_COMPONENT = 3
  23. Global Const VAP_SHELL_COMPONENT = 4
  24. Global Const BRIDGE_COMPONENT = 5
  25. Global Const FILE_SERVER_COMPONENT = 6
  26. Global Const NONDEDICATED_IPX_SPX_COMPONENT = 7
  27. Global Const IPX_ONLY = 8
  28.  
  29. Global Const NO_ERRORS = &H0
  30. Global Const COULD_NOT_GET_LOCAL_TARGET = &HFF
  31. Global Const COULD_NOT_OPEN_SOCKET = &HFE
  32. Global Const COULD_NOT_BEGIN_CONNECTION = &HFD
  33. Global Const COULD_NOT_ESTABLISH_CONNECTION = &HFC
  34. Global Const COULD_NOT_TERMINATE_CONNECTION = &HFB
  35. Global Const BAD_CONNECTION_ID = &HFA
  36. Global Const COULD_NOT_SEND_REQUEST = &HF9
  37. Global Const RECEIVED_REPLY_IN_ERROR = &HF8
  38. Global Const NETWORK_NOT_FOUND = &HEF
  39. Global Const NO_RESPONSE_FROM_DESTINATION = &HEE
  40. Global Const RESPONSE_COMPLETION_CODE_BAD = &HED
  41. Global Const LIST_SIZE_TOO_SMALL = &HEC
  42. Global Const INTERNAL_LIST_ERROR = &HEB
  43. Global Const NODE_NOT_FOUND_OR_NO_RESPONSE = &HEA
  44. Global Const MEMORY_ALLOCATION_ERROR = &HDF
  45. Global Const VERSION_DOES_NOT_SUPPORT = &HDE
  46.  
  47. Type NodeAddress
  48.     nodeHi As Long
  49.     nodeLo As Integer
  50. End Type
  51.  
  52. Type IPXAddress
  53.     network As Long
  54.     nodeAddr As NodeAddress
  55.     socket As Integer
  56. End Type
  57.  
  58. Type IPXHeader
  59.     checkSum As Integer
  60.     length As Integer
  61.     transportControl As String * 1
  62.     packetType As String * 1
  63.     destination As IPXAddress
  64.     source As IPXAddress
  65. End Type
  66.     
  67. Type SPXHeader
  68.     checkSum As Integer
  69.     length As Integer
  70.     transportControl As String * 1
  71.     packetType As String * 1
  72.     destination As IPXAddress
  73.     source As IPXAddress
  74.     connectionControl As String * 1
  75.     dataStreamType As String * 1
  76.     sourceConnectionID As Integer   'high-low unsigned
  77.     destConnectionID As Integer     'high-low unsigned
  78.     sequenceNumber As Integer       'high-low unsigned
  79.     acknowledgeNumber As Integer    'high-low unsigned
  80.     allocationNumber As Integer     'high-low unsigned
  81. End Type
  82.  
  83. Type ECBFragment
  84.     address As Long
  85.     size As Integer
  86. End Type
  87.  
  88. Type ECB
  89.     linkAddress As Long
  90.     esrAddress As Long
  91.     inUseFlag As String * 1
  92.     completionCode As String * 1
  93.     socketNumber As Integer
  94.     ipxWorkspace As String * 4
  95.     driverWorkspace As String * 12
  96.     immediateAddress As IPXAddress
  97.     fragmentCount As Integer
  98.     fragmentDescriptor As ECBFragment
  99. End Type
  100.  
  101. Type CONNECTION_INFO
  102.     connectionState As String * 1
  103.     connectionFlags As String * 1
  104.     sourceConnectionID As Integer           'high-low byte order
  105.     destinationConnectionID As Integer      'hi-lo
  106.     sequenceNumber As Integer               'hi-lo
  107.     acknowlegeNumber As Integer             'hi-lo
  108.     allocationNumber As Integer             'hi-lo
  109.     remoteAcknowledgeNumber As Integer      'hi-lo
  110.     remoteAllocationNumber As Integer       'hi-lo
  111.     connectionSocket As Integer
  112.     immediateAddress As IPXAddress
  113.     destination As IPXAddress
  114.     retransmissionCount As Integer          'hi-lo
  115.     estimatedRoundTripDelay As Integer      'hi-lo
  116.     retransmittedPackets As Integer         'hi-lo
  117.     suppressedPackets As Integer            'hi-lo
  118. End Type
  119.  
  120. Type BeginDiagnosticStruct     'same as IPXAddress
  121.     network As Long
  122.     nodeAddr As NodeAddress
  123.     socket As Integer
  124. End Type
  125.  
  126. Type AllResponseData
  127.     completionCode As String * 1
  128.     intervalMarker As Long
  129. End Type
  130.  
  131. Type IPXSPXVersion
  132.     IPXMajorVersion As String * 1
  133.     IPXMinorVersion As String * 1
  134.     SPXMajorVersion As String * 1
  135.     SPXMinorVersion As String * 1
  136. End Type
  137.  
  138. Type IPXStatisticsStruct
  139.     sendPacketCount As Long
  140.     malformedPacketCount As Integer
  141.     getECBRequestCount As Long
  142.     getECBFailureCount  As Long
  143.     aesEventCount As Long
  144.     postponedAESEventCount As Integer
  145.     maxConfiguredSocketsCount As Integer
  146.     maxOpenSocketsCount As Integer
  147.     openSocketFailureCount As Integer
  148.     listenECBCount As Long
  149.     ecbCancelFailureCount As Integer
  150.     findRouteFailureCount As Integer
  151. End Type
  152.  
  153. Type SPXStatisticsStruct
  154.     maxConnectionsCount As Integer
  155.     maxUsedConnectionsCount As Integer
  156.     establishConnectionRequest As Integer
  157.     establishConnectionFailure As Integer
  158.     listenConnectionRequestCount As Integer
  159.     listenConnectionFailureCount As Integer
  160.     sendPacketCount As Long
  161.     windowChokeCount As Long
  162.     badSendPacketCount As Integer
  163.     sendFailureCount As Integer
  164.     abortConnectionCount As Integer
  165.     listenPacketCount As Long
  166.     badListenPacketCount As Integer
  167.     incomingPacketCount As Long
  168.     badIncomingPacketCount As Integer
  169.     suppressedPacketCount As Integer
  170.     noSessionListenECBCount As Integer
  171.     watchdogDestroySessionCount As Integer
  172. End Type
  173.  
  174. Type ReturnReceivedPacketStruct
  175.     receivedPackets As Integer
  176. End Type
  177.  
  178. Type StartCountingPacketsStruct
  179.     destinationSocket As Integer
  180. End Type
  181.  
  182. Type SendPacketsRequestStruct
  183.     target As BeginDiagnosticStruct
  184.     immediateAddress As String * 6
  185.     numberOfPackets As Integer
  186.     timerTickInterval As String * 1
  187.     packetsPerTickInterval As String * 1
  188.     packetSize As Integer
  189.     changeSize As Integer
  190. End Type
  191.  
  192. Type SendPacketsResponseStruct
  193.     numberOfTransmitErrors As Integer
  194. End Type
  195.  
  196. Type DriverConfigurationStruct
  197.     networkAddr As Long
  198.     nodeAddr As NodeAddress
  199.     lanMode As String * 1
  200.     nodeAddressType As String * 1
  201.     maxDataSize As Integer
  202.     reserved1 As Integer
  203.     lanHardwareID As String * 1
  204.     transportTime As Integer
  205.     reserved2 As String * 12
  206.     majorVersion As String * 1
  207.     minorVersion As String * 1
  208.     ethernetFlagBits As String * 1
  209.     selectedConfiguration As String * 1
  210.     lanDescription As String * 80
  211.     ioAddress1 As Integer
  212.     ioDecodeRange1 As Integer
  213.     ioAddress2 As Integer
  214.     ioDecodeRange2 As Integer
  215.     memoryAddress1 As String * 3
  216.     memoryDecodeRange1 As Integer
  217.     memoryAddress2 As String * 3
  218.     memoryDecodeRange2 As String * 3
  219.     interruptIsUsed1 As String * 1
  220.     interruptLine1 As String * 1
  221.     interruptIsUsed2 As String * 1
  222.     interruptLine2 As String * 1
  223.     dmaIsUsed1 As String * 1
  224.     dmaLine1 As String * 1
  225.     dmaIsUsed2 As String * 1
  226.     dmaLine2 As String * 1
  227.     microChannelFlagBits As String * 1
  228.     reserved3 As String * 1
  229.     textDescription As String * 80
  230. End Type
  231.  
  232. Type DriverStatisticsStruct
  233.     driverVersion As String * 2
  234.     statisticsVersion As String * 2
  235.     totalTxPacketCount As Long
  236.     totalRxPacketCount As Long
  237.     noECBAvailableCount As Integer
  238.     packetTxTooBigCount As Integer
  239.     packetTxTooSmallCount As Integer
  240.     packetRxOverflowCount As Integer
  241.     packetRxTooBigCount As Integer
  242.     packetRxTooSmallCount As Integer
  243.     packetTxMiscErrorCount As Integer
  244.     packetRxMiscErrorCount As Integer
  245.     retryTxCount As Integer
  246.     checksumErrorCount As Integer
  247.     hardwareRxMismatchCount As Integer
  248.     numberOfCustomVariables As Integer
  249.     variableData As String * 495
  250. End Type
  251.  
  252. Type BridgeDriverStatusStruct
  253.     boardStatus As String * 4
  254. End Type
  255.  
  256. Type ComponentList
  257.     components As String * 540
  258. End Type
  259.  
  260. Type OSVersionStruct
  261.     machineID As String * 1
  262.     versionData As String * 41
  263. End Type
  264.  
  265. Type PrimaryServerStruct
  266.     number As String * 1
  267. End Type
  268.  
  269. Type ServerAddressTableStruct
  270.     serverUsed As String * 1
  271.     orderNumber As String * 1
  272.     serverNetwork As Long
  273.     serverNode As NodeAddress
  274.     serverSocket As Integer
  275.     receivedTimeout As Integer
  276.     immediateNode As